--[[
    编码: JX-105-13
    名称: 出库波次-后台创建出库作业
    作者：HAN  
    日期: 2025-1-29

    级别：固定 (说明本段代码在项目中不太会变化)
    
    函数： CreateOutOperation

    功能:
        -- 适用于后台WFP调用
        -- 获取【出库波次】中的配盘数据对象，
        -- 每个配盘对象创建一个{货品出库}作业，容器加出库锁

    更改记录:

--]]

wms_wh = require( "wms_wh" )
jx_base= require( "jx_base" )

function CreateOutOperation( strLuaDEID )
    local nRet, strRetInfo, m

    local outbound_wave = {}
    nRet, outbound_wave = m3.GetSysCurEditDataObj( strLuaDEID, "Outbound_Wave" )
    if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "获取【出库波次】对象属性失败!"..outbound_wave ) end
    
    local strCondition, strUpdateSql
    local distribution_objs, distribution

    strCondition = "S_BS_NO = '"..outbound_wave.wave_no.."'"
    nRet, distribution_objs = m3.QueryDataObject(strLuaDEID, "Distribution_CNTR", strCondition, "" )
    if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1),"QueryDataObject失败!"..distribution_objs ) end

    -- 根据每个配盘生成出库作业
    for m = 1, #distribution_objs do
        distribution = m3.KeyValueAttrsToObjAttr(distribution_objs[m].attrs)   
        nRet, strRetInfo = jx_base.Create_Distribution_OutOperation ( strLuaDEID, distribution )
        if ( nRet ~= 0 ) then
            mobox.stopProgram( strLuaDEID, strRetInfo )
            return
        end
    end   
    
    -- 更新出库波次的状态 N_B_STATE = 3 表示已经创建作业
    strUpdateSql = "N_B_STATE = 3"
    strCondition = "S_WAVE_NO = '"..outbound_wave.wave_no.."'"
    nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Outbound_Wave", strCondition, strUpdateSql )
    if ( nRet ~= 0 ) then  lua.Error( strLuaDEID, debug.getinfo(1), "更新【出库波次】状态失败!"..strRetInfo ) end  
    
    -- 更新出库单状态为 作业中3
    nRet, strRetInfo = mobox.updateDataAttrByCondition( strLuaDEID, "Outbound_Order", strCondition, strUpdateSql )
    if ( nRet ~= 0 ) then  lua.Error( strLuaDEID, debug.getinfo(1), "更新【出库单】状态失败!"..strRetInfo ) end          
        
end